inc.asp ASP 风铃网站文件共享系统 V.15 - ASP源码程序

www.gusucode.com > ASP 风铃网站文件共享系统 V.15 > ASP 风铃网站文件共享系统 V.15\code\inc.asp
    <%Sub Html(title)%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE>风铃文件共享系统-<%=Title%>||http://www.717cn.com||风铃工作室为您提供最新最安全最快速的服务技术,为您打造网络顶尖网站,成为网络中安全快速的出色网站。</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content=all name=Robots>
<META content="MSHTML 6.00.3790.2706" name=GENERATOR>
<meta name="keywords" content=网站制作,程序设计,网站修改,网站升级,网站维护,风铃同学录,风铃工作室,ASP.NET,ASP,SQL,ACCESS />
<meta name="description" content=风铃工作室为您提供最新最安全最快速的服务技术,为您打造网络顶尖网站,成为网络中安全快速的出色网站。 />
<LINK href="images/Style.css" type=text/css rel=stylesheet>
</HEAD>
<BODY bottomMargin=0 leftMargin=0 topMargin=0 rightMargin=0>
<%End Sub%>
<%
Sub Top(Title,Url)
Call Html(Title)
%>
<TABLE class="toptable" height=27 cellSpacing=0 cellPadding=0 width=778 align=center border=0>
  <TBODY>
  <TR>
    <TD height=107 align=middle background="images/banner.jpg"><OBJECT classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000 
      codeBase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0 width=776 
      height=98>
                          <PARAM NAME="movie" VALUE="images/top.swf"><PARAM NAME="quality" VALUE="high"><PARAM NAME="wmode" VALUE="transparent">
                                      <embed src="images/top.swf" width="776" height="98" 
      quality=high 
      pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" 
      type="application/x-shockwave-flash">        
      </embed></OBJECT></TD>
    </TR></TBODY></TABLE>
	<TABLE class="table bgcolor_1" cellSpacing=1 cellPadding=1 width=778 align=center>
  <TBODY>
  <TR>
    <TD width="73%" rowSpan=3 align=left style="HEIGHT: 20px">&nbsp;当前位置：<a href="Index.asp">首页</a> >> <A 
            href="<%=Url%>"><FONT 
          color=red><%=Title%></FONT></A></TD>
    <TD width="2%" rowSpan=3 align=right style="HEIGHT: 20px"><img src="images/time.gif"></TD>
    <TD style="HEIGHT: 20px" align=left rowSpan=3 width="25%"><DIV id=jnkc></DIV>
            <SCRIPT>setInterval("jnkc.innerHTML=new Date().toLocaleString()+' 星期'+'日一二三四五六'.charAt (new Date().getDay());",1000);</SCRIPT></TD>
  </TR>
  <TR></TR></TBODY></TABLE>
<%End Sub%>
<%Sub Bottom()
Call CloseDatabase()
%>
<TABLE width=778 align=center cellSpacing=1 cellPadding=1 class="bottomtable bgcolor_1">
  <TBODY>
  <TR>
    <TD align=middle colSpan=3 rowSpan=3 class="copyright_td">&copy; CopyRight 2006-2008 
      <a href="http://www.717cn.com" target="_blank"><font color="#FF0000">Www.717cn.Com</font></a>.Inc All Rights Reserved<br>
	  Design By：<a href="http://www.717cn.com/">风铃工作室</a>&nbsp;&nbsp;Email:zhb_26@163.com &nbsp;&nbsp;QQ：181046951<br>
	  页面执行时间：
	            <%
	            Dim Endtime
				Endtime = Timer()
				response.write"0"&FormatNumber((Endtime-Startime),5)&" 秒"
				%>
	  </TD></TR>
  <TR></TR>
  <TR></TR></TBODY></TABLE>
</BODY></HTML>
<%End Sub%>